home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 153 / 153.d81 / u.stealth bomber (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  1KB  |  34 lines
  1. 10 poke53280,0:poke53281,0:printchr$(14)
  2. 20 print"[147][158]    [211] [212] [197] [193] [204] [212] [200]   [194] [207] [205] [194] [197] [210]"
  3. 30 print"[212]his will add a ([217]/[206]) [207]ption to the"
  4. 40 print"boot file asking if you would like"
  5. 50 print"to '[196]isable [211]entry?'  [201]f yes, the"
  6. 60 print"sentry will still run as normal, but"
  7. 70 print"will not harm your robots."
  8. 80 print"[201]t's best to use a copy rather than"
  9. 90 print"using your original [204][207][193][196][211][212][193][210] disk!"
  10. 100 print"[205]ake sure that the [215]rite-[208]rotect tab"
  11. 110 print"on the disk is not covered as this"
  12. 120 print"program writes to the disk."
  13. 130 print"[201]f you would like to make this change,"
  14. 140 print"[201]nsert [204]oadstar [201]ssue #91 [211]ide 3 into"
  15. 150 print"[196]rive #8 and [200]it [193] [203]ey."
  16. 152 print"[193]fter hitting a key, [196]o [206][207][212] touch the"
  17. 154 print"keyboard or open the disk drive door"
  18. 156 print"until the white [195]ursor appears!!!!!!"
  19. 160 geta$:ifa$=""then160
  20. 180 q$=chr$(34):f$="stealth boot"
  21. 190 print"[147][144]load"q$f$q$",8"
  22. 200 print"41 ?"q$"[158][196]isable [211]entry? ([217]/[206])"q$
  23. 205 print"42 getz$:ifz$="q$q$"then42"
  24. 210 print"43 ifz$="q$"n"q$"then50"
  25. 215 print"44 f[207]x=6495to6498:r[197]z:p[207]x,z:n[197]"
  26. 220 print"45 f[207]x=6517to6520:r[197]z:p[207]x,z:n[197]"
  27. 225 print"46 f[207]x=6539to6542:r[197]z:p[207]x,z:n[197]"
  28. 230 print"47 d[193] 76,114,25,234,76,136,25,234,76,158,25,234"
  29. 250 print"open15,8,15,"q$"s0:"f$q$":close15:save"q$f$q$",8"
  30. 260 print"poke646,1
  31. 270 [153]""
  32. 280 [129]i[178]631[164]640:[151]i,13:[130]:[151]198,10
  33. 290 [162]
  34.